home *** CD-ROM | disk | FTP | other *** search
/ Oxygen Multimedia Graphics 22 / Oxygen Multimedia Graphics 22.iso / pc / System / OX22 / PDC_136_CI2 Script.ls < prev    next >
Encoding:
Text File  |  2008-03-12  |  1.5 KB  |  32 lines
  1. global ds, gList, giNum, gtNum, gtColor
  2.  
  3. on prepareFrame
  4.   filePath = the moviePath & "INIT"
  5.   imageName = "i" & giNum
  6.   tName = "t" & gtNum
  7.   ArtName = getAt(gList, imageName)
  8.   templateName = getAt(gList, tName)
  9.   CredSource = "ic" & giNum
  10.   Credit = getAt(gList, CredSource)
  11.   member("CI2-imagename").text = getAt(gList, imageName)
  12.   member("CI2-T1name").text = getAt(gList, "t1")
  13.   member("CI2-T2name").text = getAt(gList, "t2")
  14.   member("CI2-T3name").text = getAt(gList, "t3")
  15.   member("CI2-CREDITS").text = getAt(gList, CredSource)
  16.   member("CI2A").fileName = filePath & ds & getAt(gList, imageName) & ".jpg"
  17.   member("T1A", 4).fileName = filePath & ds & getAt(gList, "t1") & "-" & ArtName & "_E.jpg"
  18.   member("T1B", 4).fileName = filePath & ds & getAt(gList, "t1") & "-" & ArtName & "_C.jpg"
  19.   member("T1C", 4).fileName = filePath & ds & getAt(gList, "t1") & "-" & ArtName & "_D.jpg"
  20.   member("T2A", 4).fileName = filePath & ds & getAt(gList, "t2") & "-" & ArtName & "_E.jpg"
  21.   member("T2B", 4).fileName = filePath & ds & getAt(gList, "t2") & "-" & ArtName & "_C.jpg"
  22.   member("T2C", 4).fileName = filePath & ds & getAt(gList, "t2") & "-" & ArtName & "_D.jpg"
  23.   member("T3A", 4).fileName = filePath & ds & getAt(gList, "t3") & "-" & ArtName & "_E.jpg"
  24.   member("T3B", 4).fileName = filePath & ds & getAt(gList, "t3") & "-" & ArtName & "_C.jpg"
  25.   member("T3C", 4).fileName = filePath & ds & getAt(gList, "t3") & "-" & ArtName & "_D.jpg"
  26.   updateStage()
  27. end
  28.  
  29. on exitFrame me
  30.   go(the frame + 1)
  31. end
  32.